home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 25 / AMIGAplus Sonderheft 25 (2000)(Falke)(DE)(Track 1 of 4)[!].iso / Updates / AmigaOS3.5 / BookMagik / BookMagik.rexx < prev    next >
OS/2 REXX Batch file  |  2000-05-16  |  3KB  |  206 lines
  1. /* BookMagik Commodity demo and documentation script */
  2.  
  3. /****** BookMagikCx/IMPORT **************************************
  4.  
  5.    NAME
  6.       IMPORT
  7.  
  8.    SYNOPSIS
  9.       result = IMPORT FROM/A,TYPE/N/A
  10.  
  11.    FUNCTION
  12.       Imports the specified addressbook type to the aml addressbook
  13.  
  14.    INPUTS
  15.       from - file to import
  16.       type - file type to import
  17.  
  18.    RESULT
  19.      result = 1 for success, 0 for failure
  20.  
  21. **************************************************************************
  22.  
  23. */
  24.  
  25. /****** BookMagikCx/HIDE **************************************
  26.  
  27.    NAME
  28.       HIDE
  29.  
  30.    SYNOPSIS
  31.       result = HIDE
  32.  
  33.    FUNCTION
  34.       hides the application window
  35.  
  36.    INPUTS
  37.       none
  38.  
  39.    RESULT
  40.      result - returns FALSE if not successful
  41.  
  42. **************************************************************************
  43.  
  44. */
  45.  
  46. /****** BookMagikCx/UNHIDE **************************************
  47.  
  48.    NAME
  49.       UNHIDE
  50.  
  51.    SYNOPSIS
  52.       result = UNHIDE
  53.  
  54.    FUNCTION
  55.       restores the application window
  56.  
  57.    INPUTS
  58.       none
  59.  
  60.    RESULT
  61.       result - returns FALSE if not successful
  62.  
  63. **************************************************************************
  64.  
  65. */
  66.  
  67. /****** BookMagikCx/ICONIFY **************************************
  68.  
  69.    NAME
  70.       ICONIFY
  71.  
  72.    SYNOPSIS
  73.       result = ICONIFY
  74.  
  75.    FUNCTION
  76.       iconifies the application
  77.  
  78.    INPUTS
  79.       none
  80.  
  81.    RESULT
  82.       1 if successful, 0 for failure
  83.  
  84. **************************************************************************
  85.  
  86. */
  87.  
  88. /****** BookMagikCx/UNICONIFY **************************************
  89.  
  90.    NAME
  91.       UNICONIFY
  92.  
  93.    SYNOPSIS
  94.       result = UNICONIFY
  95.  
  96.    FUNCTION
  97.       uniconifies the application
  98.  
  99.    INPUTS
  100.       none
  101.  
  102.    RESULT
  103.       result - 1 if successful, 0 for failure
  104.  
  105. **************************************************************************
  106.  
  107. */
  108.  
  109. /****** BookMagikCx/VERSION **************************************
  110.    NAME
  111.       VERSION
  112.  
  113.    SYNOPSIS
  114.       result = VERSION
  115.  
  116.    FUNCTION
  117.       returns the version string
  118.  
  119.    INPUTS
  120.       none
  121.  
  122.    RESULT
  123.       result - returns the version string of BookMagikCx
  124.  
  125. **************************************************************************
  126.  
  127. */
  128.  
  129. /****** BookMagikCx/AUTHOR **************************************
  130.    NAME
  131.       AUTHOR
  132.  
  133.    SYNOPSIS
  134.       result = AUTHOR
  135.  
  136.    FUNCTION
  137.       returns the author information
  138.  
  139.    INPUTS
  140.       none
  141.  
  142.    RESULT
  143.       result - returns the author string of BookMagikCx
  144.  
  145. **************************************************************************
  146.  
  147. */
  148.  
  149. /****** BookMagikCx/QUIT **************************************
  150.  
  151.    NAME
  152.       QUIT
  153.  
  154.    SYNOPSIS
  155.       void = QUIT
  156.  
  157.    FUNCTION
  158.       quits the application
  159.  
  160.    INPUTS
  161.       none
  162.  
  163.    RESULT
  164.       none
  165.  
  166. **************************************************************************
  167.  
  168. */
  169.  
  170. options results
  171.  
  172. ADDRESS BookMagik.1
  173.  
  174. say 'Hiding..'
  175. HIDE
  176.  
  177. Call mywait()
  178. say 'UnHiding..'
  179. UNHIDE
  180.  
  181. Call mywait()
  182. say 'Iconify..'
  183. ICONIFY
  184.  
  185. Call mywait()
  186. say 'UnIconify..'
  187. UNICONIFY
  188.  
  189. Call mywait()
  190. VERSION
  191. say 'Version: 'RESULT
  192.  
  193. Call mywait()
  194. AUTHOR
  195. say ' Author: 'RESULT
  196.  
  197. Call mywait()
  198. say 'Quitting..'
  199. QUIT
  200.  
  201. exit
  202.  
  203. mywait: procedure
  204.    address command 'c:wait 2'
  205.    return
  206.